home *** CD-ROM | disk | FTP | other *** search
/ Revista CD Expert 37 / CD Expert nº 37.iso / LastCall / lastcall.exe / stuff / recipe.dxr / 00026_X bottle footnote.ls < prev    next >
Encoding:
Text File  |  2000-03-23  |  361 b   |  23 lines
  1. property pDestination, pSpr
  2.  
  3. on beginSprite me
  4.   pSpr = sprite(me.spriteNum)
  5.   mRefresh(me)
  6. end
  7.  
  8. on mRefresh me
  9.   global gLastCurrent
  10.   thisRecipe = currentRecipe()
  11.   if thisRecipe then
  12.     if not count(getXbottleIngredients(thisRecipe, 1)) then
  13.       pSpr.locH = 1000
  14.     end if
  15.   else
  16.     pSpr.locH = 1000
  17.   end if
  18. end
  19.  
  20. on mouseDown
  21.   customHelpTopic(#X)
  22. end
  23.